home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Deutsche Edition 1
/
Deutsche Edition 1.iso
/
amok
/
amok_lha
/
amok31.lha
/
Thermic
/
Therm.DOK
< prev
next >
Wrap
Text File
|
1993-08-15
|
1KB
|
29 lines
(*---------------------------------------------------------------------------
:Program. Thermic
:Contants. Simulation von Wärmeausbreitung
:Remark. very simple
:Author. Markus Peuckert
:Address. Schützenstr. 50, D-3550 Marburg, West-Germany,
:History. V1.0, Markus Peuckert, Oct-89
:Copyright. PD
:Language. Modula-2
:Translator. M2Amiga V3.2d
---------------------------------------------------------------------------*)
Sehr einfaches Programm, das die Wärmeausbreitung auf einer Fläche
simuliert. Zum Berechnen der Temperatur eines Punktes werden einfach
die Temperaturen der acht umgebenden Punkte addiert und durch acht
geteilt. Es werden einige Punkte mit einer Ausgangstemperatur von
Tausend Grad gesetzt. Die Umgebung hat Null Grad. Diese Punkte
kühlen aber auch nicht ab. Es besitzt keinen echten simulatorischen
Wert, sieht aber ganz nett aus. Wer daran interessiert ist, kann ja vom
SourceCode ausgehend, das Ganze realistischer umprogrammieren.
Markus
ACHTUNG: Dieses Programm kann beim WB-Start nicht abgebrochen
werden! Es berechnet dann 500 Iterationen bis es verschwindet (dauert etwa
eine halbe Stunde). [Anm. von AMOK]